home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CICA 1994 April
/
CICA Shareware for Windows CD-ROM (Walnut Creek CD-ROM)(April 1994).ISO
/
win3
/
misc
/
help30.exe
/
HLPNUMBR.SMM
< prev
next >
Wrap
INI File
|
1992-06-18
|
7KB
|
823 lines
[ver]
4
[sty]
[files]
[charset]
82
ANSI (Windows, IBM CP 1252)
[revisions]
0
[prn]
HP LaserJet III
[lang]
1
[desc]
Inserts a number, a period, and a tab at the beginning of all Numbered List paragraphs.
708899863
37
698436439
29
2
0
0
0
0
0
[fopts]
0
1
0
0
[lnopts]
2
Body Text
1
[docopts]
5
2
[tag]
Body Text
2
[fnt]
TimesNewRomanPS
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
Body Single
3
[fnt]
TimesNewRomanPS
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Single
0
0
[tag]
Bullet
4
[fnt]
TimesNewRomanPS
240
0
49152
[algn]
1
1
0
288
288
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
<*0>
360
1
1
0
0
0
0
[nfmt]
272
1
2
.
,
$
Bullet
0
0
[tag]
Bullet 1
5
[fnt]
TimesNewRomanPS
240
0
49152
[algn]
1
1
288
288
288
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
<*5>
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Bullet 1
0
0
[tag]
Number List
6
[fnt]
TimesNewRomanPS
240
0
49152
[algn]
1
1
360
360
360
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
<*:>.
360
1
1
0
0
0
0
[nfmt]
272
1
2
.
,
$
Number List
0
0
[tag]
Subhead
7
[fnt]
TimesNewRomanPS
240
0
49155
[algn]
1
1
0
0
0
[spc]
33
273
1
72
72
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
2
0
1
1
0
0
0
0
[nfmt]
272
1
2
.
,
$
Subhead
0
0
[tag]
Title
8
[fnt]
Arial MT
360
0
16385
[algn]
4
1
0
0
0
[spc]
33
446
1
144
72
1
100
[brk]
16
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
1
0
1
1
0
0
0
0
[nfmt]
272
1
2
.
,
$
Title
0
0
[lay]
Standard
513
[rght]
15840
12240
1
1440
1440
1
1440
1440
0
1
0
1
0
2
1
1440
10800
12
1
720
1
1440
1
2160
1
2880
1
3600
1
4320
1
5040
1
5760
1
6480
1
7200
1
7920
1
8640
[hrght]
[lyfrm]
1
11200
0
0
12240
1440
0
1
3
1 0 0 0 0 0 0
0
0
1
[frmlay]
1440
12240
1
1440
72
1
792
1440
0
1
0
1
1
0
1
1440
10800
1
3
9360
[txt]
>
[frght]
[lyfrm]
1
13248
0
14400
12240
15840
0
1
3
1 0 0 0 0 0 0
0
0
2
[frmlay]
15840
12240
1
1440
792
1
14472
1440
0
1
0
1
1
0
1
1440
10800
2
2
4680
3
9360
[txt]
>
[elay]
[l1]
0
[pg]
2
46 0 14 0 0 1 0 65535 65535 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0
54 0 12 1025 0 0 0 65535 65535 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0
[edoc]
<:#278,9360>' This macro inserts a number, a period, and a tab at the beginning of all Numbered List
<:#278,9360>' paragraphs.
<:#278,9360>
<:#278,9360>function numlist()
<:#278,9360>singlestep(0)
type("<[>CTRLHOME]")
<:#278,9360>if Replace("", "", 6, "Numbered List", "") <<<;> 1
<:#278,9360> message("There are no Numbered List paragraphs in this document.")
<:#278,9360> exit function
<:#278,9360>endif
<:#278,9360>type("<[>ESC]")
<:#278,9360>type("<[>HOME]")
<:#278,9360>if ateof()=1
<:#278,9360> type("<[>HOME]")
<:#278,9360> exit function
<:#278,9360>endif
<:#278,9360>i = 1
<:#278,9360>again:
<:#278,9360>if len(i) << 2
<:#278,9360> i = "{i}"
<:#278,9360>endif
<:#278,9360>if gettextbeforecursor$() <<<;> ""
<:#278,9360> Type( "<[>ctrlup]")
<:#278,9360>endif
<:#278,9360>ck = curchar$()
<:#278,9360>if isnumeric(ck)
<:#278,9360> while(Instr(1, curshade$(), " ") << 1)
<:#278,9360> type("<[>shiftright]")
<:#278,9360> wend
<:#278,9360> type("<[>del]")
<:#278,9360>endif
<:#278,9360>type("{i}.<[>Tab]")
<:#278,9360>type("<[>CTRLDown]<[>Right]" )
<:#278,9360>if ateof()=1
<:#278,9360> type("<[>HOME]")
<:#278,9360> exit function
<:#278,9360>endif
<:#278,9360>
<:#278,9360>while (1)
<:#278,9360> styname = GetStyleName$()
<:#278,9360> switch styname
<:#278,9360> case "Numbered List"
<:#278,9360> i = i + 1
<:#278,9360> goto again
<:#278,9360> case
<:#278,9360> "Heading 2"
<:#278,9360> i = 0
<:#278,9360> endswitch
<:#278,9360> type("<[>ctrldown]")
<:#278,9360> if ateof() = 1
<:#278,9360> exit function
<:#278,9360> endif
<:#278,9360>wend
<:#278,9360>end function
>
[Embedded]
00005635
>
[macsum] 1
numlist 0 0 4 3
[macse]
14 numlist
0 4 0
17 2
0 6 "[16420]"
17 3
2 488 1 "" "" 6 "Numbered List" ""
13
5 1
18 1
11 00000191
17 4
0 3 "There are no Numbered List paragraphs in this document."
6 0
15
9
17 7
0 6 "[27]"
17 8
0 6 "[36]"
17 9
0 278
13
5 1
18 0
11 00000299
17 10
0 6 "[36]"
6 0
15
9
17 13
29 1 i
5 1
8 1
17 15
0 14 "{1}"
13
5 2
18 5
11 00000392
17 16
7 "{1}"
8 1
17 18
0 37
13
7 ""
18 1
11 00000456
17 19
0 6 "[16422]"
17 21
29 2 ck
0 282
13
8 2
17 22
0 277 "{2}"
13
11 00000640
17 23
0 24
13
0 808 1 [X] " "
13
5 1
18 5
11 00000621
17 24
0 6 "[4135]"
10 00000525
17 26
0 6 "[46]"
17 28
0 6 "{1}.[9]"
17 29
0 6 "[16424][39]"
17 30
0 278
13
5 1
18 0
11 00000761
17 31
0 6 "[36]"
6 0
15
9
17 35
5 1
11 00001078
17 36
29 3 styname
0 288
13
8 3
17 37
7 "Numbered List"
6 3
18 0
11 00000933
17 39
6 1
5 1
3 0
8 1
17 40
10 00000324
10 00000989
7 "Heading 2"
6 3
18 0
11 00000989
17 43
5 0
8 1
17 45
0 6 "[16424]"
17 46
0 278
13
5 1
18 0
11 00001065
6 0
15
9
10 00000761
6 0
15
17 50
9
00005660